home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 14 / CU Amiga Magazine's Super CD-ROM 14 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-09].iso / CUCD / Programming / XPK / Source / test / testCurrentTime.c < prev    next >
Encoding:
C/C++ Source or Header  |  1997-04-15  |  1008 b   |  54 lines

  1. #define NAME     "testCurrentTime"
  2. #define REVISION "1"
  3.  
  4. /* Programmheader
  5.  
  6.     Name:        testCurrentTime
  7.     Author:        SDI
  8.     Distribution:    PD
  9.     Description:    tests CurrentTime function
  10.     Compileropts:    -gM
  11.     Linkeropts:    -l amiga
  12.  
  13.  1.1   06.12.96 : added header
  14. */
  15.  
  16. #include <pragma/intuition_lib.h>
  17. #include <pragma/exec_lib.h>
  18. #include <pragma/dos_lib.h>
  19. #include "SDI_defines.h"
  20.  
  21. ULONG DosVersion = 37;
  22. struct Library *IntuitionBase = 0;
  23.  
  24. void main(void)
  25. {
  26.   ULONG sec, usec, sec0, usec0, tim;
  27.  
  28.   if((IntuitionBase = OpenLibrary("intuition.library",33)))
  29.   {
  30.     CurrentTime(&sec0, &usec0);
  31.     Printf("%lu %lu\n",sec0,usec0);
  32.  
  33.     while(!CTRL_C)
  34.     {
  35.       CurrentTime(&sec, &usec);
  36.       if(usec >= usec0)
  37.       {
  38.         sec = sec - sec0;
  39.         usec = usec - usec0;
  40.       }
  41.       else
  42.       {
  43.         sec = sec - sec0 - 1;
  44.         usec = usec + 1000000 - usec0;
  45.       }
  46.       tim = (sec<<7) + usec / (1000000>>7);
  47.  
  48.       Printf("%lu %lu %lu\n", sec, usec, tim);
  49.     }
  50.     CloseLibrary(IntuitionBase);
  51.   }
  52.   exit(0);
  53. }
  54.